| !Run file for Key Window
| by R.G.Hallas
|
Set KeyWindow$Dir <Obey$Dir>
SetEval KeyWindow$Flags 59
|
| The KeyWindow$Flags variable is a decimal number
| in the range 0 to 63, which is calculated from the
| following set of bits, which mean, when set:
|
|   Bit 0: Always open keystrip at top of screen.
|   Bit 1: Scroll strip when pointer reaches edges.
|   Bit 2: Show horizontal scroll bar, along with a
|          resize icon and a toggle size icon.
|   Bit 3: Always compress keystrip to fit screen.
|   Bit 4: Context sensitive: applications gaining
|          the caret will open new strips.
|   Bit 5: Load sensitive: applications starting up
|          and quitting will open and close strips.
|
Set KeyWindow$Sprites "<KeyWindow$Dir>.5Sprites"
If "<Boot$OSVersion>" < "500" Then Set KeyWindow$Sprites "<KeyWindow$Dir>.4Sprites"
If "<Boot$OSVersion>" < "400" Then Set KeyWindow$Sprites "<KeyWindow$Dir>.!Sprites"
IconSprites <KeyWindow$Sprites>
Unset FlagDay$Sprites
WimpSlot -min 80K -max 80K
Run <KeyWindow$Dir>.!RunImage
